home *** CD-ROM | disk | FTP | other *** search
/ Meeting Pearls 2 / Meeting Pearls Vol. II (1995)(GTI - Schatztruhe)[!].iso / Pearls / comm / Envoy / Conf / tkbase.i < prev   
Text File  |  1994-03-15  |  1KB  |  49 lines
  1.         IFND SERVICESBASE_I
  2. SERVICESBASE_I SET   1
  3.  
  4. ;-----------------------------------------------------------------------
  5.  
  6.         INCLUDE "exec/types.i"
  7.         INCLUDE "exec/libraries.i"
  8.         INCLUDE "exec/lists.i"
  9.         INCLUDE "exec/semaphores.i"
  10.         INCLUDE "utility/tagitem.i"
  11.  
  12. ;-----------------------------------------------------------------------
  13.  
  14.    STRUCTURE TKSSvc,LIB_SIZE
  15.         ULONG   TKS_DOSBase
  16.         ULONG   TKS_NIPCBase
  17.         ULONG   TKS_SysBase
  18.         ULONG   TKS_UtilityBase
  19.         ULONG   TKS_Entity
  20.         ULONG   TKS_SegList
  21.  
  22.         STRUCT  TKS_OpenLock,SS_SIZE
  23.         
  24.    LABEL TKSSvc_SIZEOF
  25.  
  26. ;-----------------------------------------------------------------------
  27.  
  28.         LIBINIT
  29.  
  30.         LIBDEF  _LVOStartServce
  31.  
  32. ;---------------------------------------------------------------------------
  33.  
  34. CALL MACRO <Function_Name>
  35.         xref _LVO\1
  36.         jsr _LVO\1(A6)
  37.      ENDM
  38.  
  39. ;---------------------------------------------------------------------------
  40.  
  41. GO   MACRO <Function_Name>
  42.         xref _LVO\1
  43.         jmp _LVO\1(A6)
  44.      ENDM
  45.  
  46. ;---------------------------------------------------------------------------
  47.  
  48.         ENDC    ; SERVICESBASE_I
  49.